RestScr (aScreenArray) --> true:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Functions:
~~~~~~~~~~
The screen is restored, cursor shape and position, colors and the  text
from the aScreeenArray created by SaveScr().

Parameter description:
~~~~~~~~~~~~~~~~~~~~~~
aScreenArray: array of data saved by SaveScr()

Return value:
~~~~~~~~~~~~~
true

Example:
~~~~~~~~
    local aS:=SaveScr()    //screen save
    cls                    //erase
    InKey(0)               //wait for keypress
    RestScr(aS)            //screen restore

Source code is in file  Object1.prg